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THE MIDAS ASSEMBLY PROGRAM 

Introduction 

Programming for a digital computer Is writing the precise 
sequence of instructions and data which Is required to perform 
a given computation* The purpose of an assembly program is to 
facilitate programming by translating a source language, which 
is convenient for the programmer to use* into a numerical 
representation or object program* which is convenient for the 
computer hardware to deal with, A symbolic assembly program 
such as MIDAS permits the programmer to use mnemonic symbols 
to represent instructions, locations, and other quantities with 
which he may be working, The use of symbolic labels or address 
tags permits the programmer to refer to instructions or data 
without actually knowing or caring what specific location in 
the computer memory they may occupy* 

MIDAS is a two pass assembler^ that is, it normally processes 
the source program twice . During the first pass, it enters all 
symbols definitions encountered into its symbol table, which it 
then uses on Pass 2 to generate the complete object program,. 

The MIDAS Source Language 

A program consists of a sequence of numbers in "memory which 
may be instructions, data, or botfcu We shall refer to these 
numbers as words without specifying whether they are instructions 
or not* A word is denoted in the source program by one or more 
syllables separated by suitable combining operators, and termi- 
nated by a tab or carriage returno A syllable may be defined 
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as being the smallest element of the programming language which 
has a numerical or operational value* The following are some 
different types of syllables: 

1. Integers. An integer is a string of digits, which will 
be interpreted as an octal or decimal number, 

2. Symbols. A symbol is a string of alphanumeric char- 
acters (lower case numerals and letters, and upper 
case letters except u, I, s, and X) containing at 
least one letter. The first six characters of a symbol 
are used to identify it if it is more than six char- 
acters long. 

Syllables may be combined with the following operators: 

+ or space means addition, modulo 2 X -i (one's complement). 

- means addition of the one's complement. 

U means logical union (inclusive or). 

I means logical intersection (logical and). 

S means logical disjunction (exclusive or). 

X means integer multiplication. 
A symbolic expression is one syllable, or more than one syllable 
combined with these operators. We shall refer to +, -, and 
space as additive operators, and U, I, S, and X as product 
operators . 

Operations are performed from left to ri#it, except all 
product operations are performed before additive operations 
It is not admissible to precede or follow a product operator 
with any other operator. In a string of consecutive additive 
operators, the last one seen applies. 



The following examples of symbolic expressions on the left 

have the value listed on the right. (All numbers in this memo 

are octal unless followed by a decimal point ' V\ ) 

2 2 

2+3 5 

2 -3 777776 

2X3 6 

2U3 3 

213 2 

2S3 1 

-2S3 777776 

—1 777776 

- i 1 

7-2U3 4 

add 40 200040 

calUcom 700240 

A symbolic expression terminated by a tab or carriage return 

is a storage word* The location in memory to which it is assigned 

is determined by a location counter in MIDAS, After each word 

is assigned, the location counter is advanced by one. 

More About Symbols . Pseudo-Instructions . 

MIDAS classifies symbols according to the manner of their 
definition* The initial vocabulary consists of symbols for the 
more commonly used TX-0 instructions, and also a class of symbols 
called pseudo-instructions, which represent directions to MIDAS 
on how to proceed with the assembly . Some examples of pseudo- 
instructions are: 

Szl Action 

octal All integers following (unless specifically denoted 
as decimal) are interpreted as octal numbers until 
next appearance of pseudo-instruction decimal , 
decimal All integers following are interpreted as decimal 
numbers until next appearance of pseudo-instruc- 
tion octal e 
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start Denotes the end of the program . 
Additional pseudo-instructions will be discussed at opportune 
places • A complete list is given in Appendix 1» 
Symbols are defined in the following ways: 

i« As address tags* A comma following a symbolic expres- 
sion denotes an address^tag. If the tag is a single, 
undefined symbol, it will be defined with numerical 
value equal to the present value of the location 
counter. If the tag is any other defined symbolic 
expression, it will have its value compared with the 
present value of the location counter, and an error 
comment (mdt ) will be made in the event of a disagree- 
ment . If the tag is any other symbolic expression 
which is undefined when encountered on Pass 2, an 
error comment is made (ust). use of a defined symbol 
as an address tag cannot change the value of the symbol. 
2* 3y parameter assignments . A symbol may be assigned a 
numerical value by the use of a parameter assignment, 
a. The form 

symbol»expr-* 
where ®JP$>9A is any legal symbol and expr is any 
symbolic expression terminated by a tab or carriage 
return, defines symbol as having the numerical 
value of expr. Parameter assignments may be used 
to set table sizes, define new operation codes, 
or for other purposes. Thus 

cle^calUxrck 
defines cle as 700201, which, as an operate instruction, 
would clear the AC, LR, and XR. 
b» A symbol may be defined as an "initial" symbol, and 
hence will not be printed by the symbol print, by 
using: instead of «. Qpsyn and equals will preserve 
this distinction. 
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As variables. The appearance of a letter or letters in 
upper case in any legal, undefined symbol, at any appear- 
ance of that symbol, defines that symbol as a variable . 
For each such s^rmbol defined, one register is allocated 
in a region of storage reserved by the next appearance 
of the pseudo-instruction variables. The initial 
contents of these registers is undefined. This 
feature facilitates the reserving of temporary 
storage locations. Example: 



sto temp 
tsx subr 
Ida Temp 



variables 
Beware: Do NOT try to use upper case letters U, I, S, or 
X to denote a variable! 

4. As macro instructions. A symbol is defined as a macro- 
instruction name by use of the pseudo-instruction de- 
fine. Further discussion of macro instructions will 
be left until later. 

5» With equals or ogsyn. A symbol may be defined as pre- 
cisely equivalent to any other symbol by use of the 
pseudo-instruction equals and opsyn. The usage is: 

equals anysym, defsyra^ 
or 

opsyn anysym, defsynu 
where the symbol anysym is made logically equivalent 
to <*ersm if the latter is defined. Previously defined 
symbols are redefined- Equals and o ftsyn differ in one 
respect: opsyn is effective in Pass 1 only. These 
may be used to define a logical equivalent for any 
other defined symbol. Thus abbreviations may be de- 
fined for pseudo-instructions if desired Note that 
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equals and opsyn are NOT the same as the equals sign 
used in parameter assignments, and are not in general 
interchangeable with it. Eguals and opsyn are used 
to give a symbol a logical or operational value, 
while parameter assignments are used to give a symbol 
a nmerical value* Beware that if you define synonyms 
for gfoar t that either the synonym starts with the let- 
ters s, t, a, r, t or the word start appears after 
the use of the synonym at the end of the source program 
tape* Although the main processor in MIDAS will 
recognise synonyms for start, the part of the program 
which reads tape will not, and must be fooled into 
stopping the tape reader independently of the rest of 
the assembly. 

The Location Counter 

The MIDAS location counter records the assigned location 
for each word in the object program. It is set to 20 at the 
beginning of each pass, and counts upward modulo memory size* 
The location counter may be set to any value by writing 

expr | 
This sets the location counter to the value of the symbolic 
expression e xgr modulo 2 3. jf expr contains an undefined symbol, 
on Pass i the location becomes indefinite , and the definition 
of address tags is inhibited until the location again becomes 
definite by means of a defined location assignment. On Pass 
2, an undefined symbol will result in an error message (us-). 
The undefined symbol is taken as zero, and the location remains 
definite. The pseudo-instruction variables may not be used when 
the location is indefinite. 
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The value of the location counter may be obtained by using 

the special syllable f, . H (period ). Examples: 

tze »4-2 com 

tra nonzero trn .-1 

llr foo 

The first example transfers to location nonzero if the AC contains 

any number other than zero, but zero in the AC causes the program 

to skip to the l lr instruction. The second example puts the 

magnitude of the contents of the AC into the AC by transferring 

back to the complement instruction until the AC becomes positive . 

The second instruction is read "trn point minus one. w 

The character ".", when preceded by an integer, denotes 
that the integer is to be considered as decimal regardless of 
the effect of the pseudo-instruction octal or decimal . "Point* 1 
means location counter only when it appears as a distinct 
syllable. Thus, 

add • means add this instruction to AC 

20 o means 20 decimal. 

The character |, when not preceded by an expression, denotes 
the beginning of a comment. Characters following it are ignored 
until the next tab or carriage return. 

Constants 

Constants required by a program will be reserved automatically 
by MIDAS when enclosed in parentheses. Thus, if it is required 
to get the number add 20 into the accumulator, one can write 

Ida (add 20) 
The word enclosed in parentheses is stored in a block reserved 
by the next appearance of the pseudo-instruction constants . 
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Duplicate constants are stored only once. Closing parens will 
be supplied automatically by MIDAS if the character following 
is a word terminator (e.g., tab or carriage return). The 
constant word and surrounding parens are treated as a single 
syllable whose value is the address of a register containing 
the constant word. Constants may be used in constants. The 
following two program fragments are equivalent; 
add (add (2G)~llr-(30 add a 



constants a, add b-llr-c 

b, 20 

c, 30 

The pseudo-instruction constants may not be used where the 
location is indefinite. 

Flexo Code Pseudo-Instructions 

Three pseudo-instructions are provided to facilitate 

handling flexowriter characters in programs. These are: 

!• character qc. where gt is any of the letters 1, m, or 
r, which specifies whether the character c is to be 
placed in the left (bits 0, 3, 6, 9, 12., 15.), middle 
(bits i, 4, 7, i0., 13., 16.) or right (bits 2, 5, 8, 
11., 14., 17.) portion of the word. The pseudo- 
instruction, with its argument, is treated as a single 
syllable. 

2 * f lexo gbc, where a, b, c are any three flexo characters, 
is equivalent to 

character ra+charaeter mb-f character lc 

3- text qArbltrary string of characters . q . where the arbi- 
trary string of characters is stored three to a word as 
in f l ex o until the first character g, is encountered 
again. Neither appearance of q is considered part of 
the string . Thus £ may be any character not appearing 
in the string. 
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The following examples demonstrate their usage. 

character rf is equivalent to 11010 

character mm " " ft 222000 

flexo thi u » » 100000+202000+004400^306400 

text .this* " " » (306400) 

C.001010J 

Macro Instructions 

Often certain character sequences appear several times 

throughout a program in almost identical form. The following 

example illustrates such a repeated sequence. 

Ida a 
add b 
sto c 
Ida d 
add e 
sto f 

The sequence: 

Ida x 
add y 
sto z 

is the model upon which the repeated sequence is based. This 
model can be defined as a macro instruction and given a name. 
The characters x, g, and z are called dummy arguments , and are 
identified as such by being listed immediately following the 
macro name when the macro instruction is defined. Other 
characters, called arguments, are substituted for the dummy 
arguments each time the model is used. The appearance of a macro- 
instruction name in the source program is referred to as a call . 



The arguments are listed immediately following the macro name 
when the macro instruction is called « When a macro instruction 
is called* MIMS reads out the characters which form the macro- 
instruction definition, substitutes the characters of the 
arguments for the dummy arguments, and inserts the resulting 
characters into the source program as If typed there originally 

The process of defining a macro is best illustrated with 
and example: 

define write a,b 

tsx wr 

b-*~2 

text jaf 
b, terminate 

The pseudo -instruction define defines the first legal 
symbol following it as a macro name* Hext follow dummy arguments 
as required, separated by commas, terminated by a tab or carriage 
return Next follows the body of the macro definition,. The 
pseudo-instruction terminate indicates the end of the macro 
definition* Appearances of dummy arguments are marked, and the 
character string is stored away* Dummy arguments are delimited 
hy the following characters: plus, minus, space, U, I, S, X, 
upper case, lower case, tab, carriage return, equals, comma, 
bar, colon, and upper case 1, 6, and 9. Dummy arguments must 
be legal symbolsi any previous definition of dummy argument 
symbols is ignored while in the macro definition* 

A macro call consists of the macro name, followed if desired 
by a list of arguments separated with commas, and terminated 
with a tab or carriage returno The write macro, if called as 
follows : 
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wrlte This gets printed out*, nextag 

generates the following code : 

tsx wr 
nextag-* -2 

text jThls gets printed out, 1 
nextag, 

which with a suitable text-printing subroutine, might comprise 
the necessary code for printing "This gets printed out/ 1 on 
the flexowriter* The argument to be printed, using this format, 
must not contain the characters comma, tab, carriage return or 
bar* Comma, tab, or carriage return would end the argument 
while bar would terminate the argument of the text pseudo- 
instruction. So that comma, tab, and carriage return can be 
used within arguments, the argument quotation characters upper 
case & and are providedc They might be used as follows: 

write 6 This, of course, has commasc^ 
It also has a carriage return, 9 3 nextag 

All characters within a pair of argument quotes are considered 

to be one argument, and this entire argument, with the quotes 

removed, will be substituted for the dummy argument in the original 

definition* MIDAS marks the end of an argument only on seeing 

comma, tab, or carriage return not enclosed within argument 

quotes o If quotes appear within quotes, the outermost pair 

is dele ted . If an outer argument quote is immediately preceded 

W an upper case and immediately followed by a lower case, both 

case shifts are deleted also. A tab or carriage return immediately 

following a macro name denotes that no arguments are read. Any 

other separating character will be the first character of the 
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first argument except space a space used as a separator will 
be deleted and will not be part of the first argument* 

The second argument of the write macro is a symbol which 
is defined as an address tag each time the macro is called, so 
a different symbol must be supplied at each call of the macro 
to avoid multiply defined tags. MIDAS will supply suitable 
create d symbols for this purpose, guaranteed to be unique to 
each call of the macro* if we write the first line of the 
definition thusly: 

define write a|b or define write a, fb 
In either case, the vertical bar denotes dummy symbols following 
it will be supplied from special created symbols if not explicitly 
supplied when the macro is called. The created symbols are of 
the form OOOaOl, 000a02,... 000a09, GOOaOa, etc. The created 
symbol generator is reset to OOOaOl at the beginning of each 
pass. The number of created symbols may not exceed 33,695.. 
Note that unsupplied arguments corresponding to dummy arguments 
preceding the bar are plugged in as empty strings. Supplied 
arguments corresponding to dummy arguments following a bar suppress 
the generation of a corresponding created symbol. 

There remains one problem: How do we plant dummy arguments 
in the argument of character r, m, or 1? Of course, the r, m, 
or 1 could be part of the supplied argument, but there is another 
way. Write, say: 

define macro a 

* 
c 

add (charac r*a jnot# charac ra does not work as 
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fra Is not a dummy argument 

« 

The sequence upper case, 1, lower case 13 deleted during the 

macro definition, but causes the macro scan to search on each 

side for dummy arguments, in this case, a is found to be a 

dummy argument, and is treated accordingly, if the upper case 

1 is not both preceded and followed by case shifts, only the 

1 is deleted. Example: 

define type x464pq 

Ida (charac r*x464pq 

pno 

terminate 

type f gives Ida (charac rf 

pno 

How may one cause a created symbol to define a variable? 
It will not do to write the dummy argument in upper case, for 
then the created symbol would be in upper case. Since upper 
case numerals are not legal symbol constituents, created symbols 
must not appear in upper case. The solution is to append a 
suitable upper case letter, say z, to the dummy argument. 

Example : 

define macro (a 

sto aZ fcase shift makes end of 

tsx subr (dummy argument a 

Ida aZ "" 

terminate 
The variables would then be of the form 000a 01Z, 0000a 02Z, etc. 
which are perfectly legal and unique variables,, 
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I redefines write when called first time 



Created symbols have been introduced to solve the problem 
of address tags within macro definitions, but they may be used 
in other ways also. Some examples are given in Appendix 2. 

Macro definitions may contain other macro definitions or 
macro calls. Arguments of the macro being called may be used 
in the macros it calls or defines with perfect generality. As 
an example, let us rewrite the write macro so that it inserts 
a suitable text printing subroutine into the object program 
at its first call, and then redefines itself so that later 
occurrences call the subroutine. This might be done as follows: 

define write a 

define write c|d 

tsx wr 

d-.-2 

text |c| 
d, terminate write 

write *a 9 
tra zzxgwq 

wr, llx 

ixl 
Ipkh, ixl 

lax 1 
aux .-1 
pnt 
pnt 

prtUixl 
tix lpxh 
ixl 
trx 1 
zzxgwq, terminate 

Notice that address tags in the text printing subroutine 

need not be created symbols, as the tags appear only at the 

first call of write . They must not, of course, conflict with 

tags used elsewhere in the program, and to insure this, created 

symbols may be used if desired. Notice that, in this example, 



I calls new definition 
(text printing subr 
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the pseudo-instruction terminate has been supplied with an 
argument: the name of the macro being defined. If terminate 
is followed by a space, it will expect to find this argument, 
which it will compare with the name of the macro being defined. 
Unless they agree, an error comment (mnd) will be made. This 
permits the programmer to be sure that his defines and terminates 
count out correctly. An additional aid in this respect is the 
fact that terminate is undefined outside a macro definition. 
Arguments can, by Judicious use of argument quotes (see 
example below), contain sub-arguments. A pseudo-instruction 
irjEl (indefinite repeat) permits the analysis of such an argument. 
The pseudo-instruction ir£ in the macro definition takes one 
argument, namely, the dummy argument corresponding to the 
argument to be analyzed. When the macro instruction is called, 
the characters following the argument of the irp. until the next 
matching endlrp will be inserted once into the program for each 
sub-argument in the argument being analyzed, and the sub- 
arguments will be substituted for the corresponding dummy 
argument • Example : 

define sum a,b,c 
Ida a 
irp b 
add b 
endirp 
sto c 
terminate 

sum J, *k,l,m 9 ,N 



gives : 



Ida J 
add k 
add 1 
add m 
sto N 
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It is quite permissible to have ir-p^s within an irp, analyzing 
either the same or different arguments. The pseudo-instructions 
irp and endirp are defined only within a macro definition. If 
a n i££ analyzes a null string, the characters in the range of 
the ir£ will be inserted once, and null string will be inserted 
for the subargument . 

The G arbage Collec tor 

\Rien MIDAS redefines a macro, the space in the macro 
instruction table used by the ,,ld definition will be recovered 
if necessary, by a garbage collector. It is Important in a long 
program to insure that unused macro definitions are abandoned, 
that is, that their names are caused to refer to something else 
other than the original macro definitions. A suitable "some- 
thing else" is the pseudo-instruction null , which does absolutely 
nothing. Thus if a macro called foo has been defined, it may 
be discarded after its last usage by saying: 

equals foo, null 
which will make the space used by foo recoverable. The garbage 
collector is called whenever the combined macro and symbol tables 
are exhausted. If no space can be recovered, an error comment 
is made (sce)„ 

Repeat 

The pseudo-instruction repeat expr, anything » where exgr 
is a symbolic expression defined on Pass 1 and anything is any 
string of characters terminated by a carriage return, causes 
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qnyfchi nj g to be inserted into the program a number of times, 
called the count, equals to the value of expr* The anything , 
called the range of the repeat, can be storage words, parameter 
assignments, macro calls (if not containing carriage return in 
an argument), other repeats , or anything else. If repeat 13 
used in the range of a repeat , both repeats will end on the same 
carriage return. Repeat may be used in macros, and dummy 
arguments may appear either in the range or the count of the 
£§££§£* or both. If the count of a repeat is zero or negative, 
the range of the repeat is ignored. 

Dimension 

The pseudo-instruction dimension may be used to allocate 
space for arrays. The statement 

dimension namel(sizel), name2(size2 ),**.* 
causes space to be reserved in the variables storage for the 
array names specified. Each name is defined as the location 
of the first of the block of registers of the length specified. 
The array names must not have conflicting definitions elsewhere, 
and the array sizes must be defined at their occurence on Pass 1, 

C onditional Assembly 

It is often useful, particularly in macro instructions, to 
be able to test the value of an expression, and to condition 
part of the assembly on the result of this test. For this 
purpose the pseudo-instruction lif and Oif are provided „ 
Following the pseudo-instruction name there is a symbol called 
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a qualifier that determines the type of test; and then an 

argument that is tested according to the qualifier* The argument 

is ended by any of the word terminators tab, carriage return, 

comma, or slash. All these terminators except slash do what 

they would have done had the conditional not been present; 

but slash only marks the end of the conditional, which is treated 

as a single syllable whose value is one or zero. Examples.* 

repeat Oif vp x+1, macro argl, arg2^ 

a=lif VZXI600000- ->| 

sto p+lif vp-s|X2j 

The value of lif is one if the condition tested for is true, 

and zero otherwise; while the value of Oif is zero if the 

condition tested for is true, and one otherwise. There are at 

present two qualifiers with two corresponding tests: 

vg: If the value of the expression following is positive 
or zero (either plus or minus), the test is true* 

vz: If the value of the expression following is zero, 
the test is true* 

The first example calls the macro if x£-i. The second 
example defines a as one if the two high bits of x are both 
zero; otherwise a is defined as zero. The third example 
generates stqjg if s is positive, and sto p+2 if s is negative* 
It could also be written as: 
sto p+2X0if vps^ 

Conditionals may be used in or out of macros, but may not 
contain other conditionals. 
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The Source ....and Ob. feet Programs 

A source program for MIDAS consists of one or more f lexo 
tapes, each with a title, a body, and a start pseudo-instruction. 
The title is the first string of characters and is terminated 
by a carriage return. Carriage return and stop codes preceding 
the title are ignored. The body is the storage words, macros, 
parameter assignments, etc. which make up the substance of the 
program. It may be void. The start pseudo-instruction denotes 
the end of the source program tape. It takes one argument, 
which specifies the first instruction to be executed in the 
object programs. Start must be preceded by a tab or carriage 
return, and followed (after the argument, if supplied) by a 
carriage return • READ THE LAST SENTENCE AGAIN. In spite of 
all warnings, the number of people who omit the carriage return 
after start is amazing. Therefore, take heed. 

MIDAS 1*111 normally punch a binary object program during 
Pass 2 of an assembly. It will contain a title in readable 
characters, consisting of the visible characters in the title 
except those following (and including) an equals sign. Next 
will be punched an input routine, which is a loader that reads 
in the rest of the tape, and which is itself read in by the TX-0 
read in mode. The binary output from the body of the source 
program is punched in blocks of up to 100 registers. The end 
of the binary tape is denoted by a start block , which is produced 
by the pseudo-instruction start s The start block may be of 
two types: 
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1. The add start block causes the input routine to stop, 
and pressing Restart transfers to the address specified. 
It is punched by start addr, where addr is a symbolic 
expression whose value specifies the starting address. 
MIDAS adds add to this and punches it on the tape. 

2. The trn start block causes the input routine to transfer 
at once to the address specified, in this case the 
argument of start must have the value of add addr where 
addr is the address in question. MIDAS adds add 
(«200000) to this, giving trn (=400000) and punches it 
on the tape. 

The format of the output is subject to considerable control 
by the programmer. The pseudo-instruction noinput suppresses 
punching the input routine. The pseudo-instruction readin 
suppresses the input routine and punches in readin mode until 
the next encountering of the pseudo-instruction noinput . which 
resumes punching in input routine format. The normal input 
routine occupies registers 17756-17777, but an input routine 
occupying registers 0-22 will be supplied by the pseudo-instruction 
front loading, which, if used, must be the first thing on the 
English tape (after the title, of course). This pseudo-instruction 
causes the location counter to start at 30 instead of the usual 20. 

For fabricating special tape formats or punching start blocks 
without stopping the assembly, the pseudo-instruction word is 
provided. Its argument or arguments, separated by commas and 
ended by a tab or carriage return, are punched directly on the 
object program tape, and do not affect the location counter. 

The tape formats discussed so far are characterized by 
having a specific location in core assigned for each word in 
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the object program* MIDAS will also produce relocatable tapes, 
which, by means of a special loader, may be placed anywhere in 
memory* Before using this feature, described In the next 
section, the reader is advised to familiarise himself with 
Memorandum M-5001-34, which describes the relocatable loader 
and relocatable system „ 

Relocatable Programming 

The pseudo-instruction relocatable directs MIDAS to assemble 
the object program in relocatable format and sets the location 
counter to relocatable 0. Address tags will be defined as re- 
locatable symbols (relocation count +l) as long as the location 
is relocatable. Symbols defined by parameter assignment will 
have a relocation count equal to that of the expression to the 
right of the equal sign except that no symbol may have a 
relocation count exceeding one in magnitude, A location 
assignment puts the location to relocatable or absolute accord- 
ing to whether the relocation count of the location assignment 
is +1 or 0o Relocatable also suppresses punching an input 
routine, replacing it with a word trn 17QOQ , which, when executed 
in the readin mode, transfers control to the entry of the BRS 
Loader Storage words in relocatable mode may have relocation 
+1, -1, or 0; words in absolute mode may have relocation only* 

The pseudo-instruction exit is used to define symbols which 
are external to the program being assembled. The usage is 

exit si, s2, s3, . • *£ 
which enters the symbols sl^ s2, „ . « in the transfer vector and 
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deflnes them as the addresses they occupy there . Only the first 
three characters of these symbols are significant to the re- 
locatable loader . These symbols must not be defined with a 
conflicting definition elsewhere or an error message (mdx) 
will be produced. 

The pseudo-instruction entry is used to denote points in 
the program to which external programs may transfer control. 
The usage is: 

entry si, s2, &3, . ..- 
where the symbols sl>. s2, ... must be defined as address tags 
elsewhere in the program. The symbols so declared are entered 
in the program card. Again* only the first three characters 
of such symbols are significant to the relocatable loader. For 
a program with both primary and secondary entries, the pseudo- 
instruction entry; is used twice consecutively, first listing 
the primary and then the secondary entries. To the extent that 
the pseudo-instructions relocatable , entry , and exit are used, 
they must be used in that order, and no storage words may inter- 
vene between them. A program with no entry specified is a main 
program, and the pseudo-instruction exit will cause a program 
card to be punched with a name of -fO, as required by the BUS 
loader « If neither entry nor exit is used, ho program card 
will be provided. Since any program to be loaded by the BRS 
Loader must have a program card, it has been made possible to 
get a program card with a main program entry by using the pseudo- 
instruction entry with no arguments • The maximum number of 
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arguments of entry is 37 j there Is no limit on the number of 
arguments of exit <, 

In relocatable programs* the pseudo -instruction noinput 
will suppress punching the word trn 17000 at the head of the 
object program tape* 

Format 

MIDAS has few requirements on forsaat. The user should 

be aware of the following: 

1„ Carriage returns and tabs are equivalent except in 
the title, in the range of a repeat, and after start * 
Extra tabs or carriage returns are ignored* 

2* Backspace, the upper case numerals except 1, 6, and 
9, and the unused characters of the f lexo code, 
including blank tape with only the seventh hole 
punched, are illegal except in arguments of flexo 
code pseudo-instructions* 

3« Stop codes and color shifts are ignored except in 
arguments of flexo code pseudo-instructions. Upper 
case 1, 6, and 9 are similarly ignored when not in 
macro calls or definitions * 

4o Deletes are always ignored « 

Many programmers have found that adherence to a fairly 
rigid format is of help in writing and correcting programs. 
The following suggestions have been found useful in this respect 
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le Place address tags at the left margin, and run instruc- 
tions vertically down the page indented one tab stop 
from the left margin,, 

2* Surround address tags with color shifts. It looks nice* 

3* Use only a single carriage return between instructions, 
except where there is a logical break in the floif of 
the program. Then put in an extra carriage return 

4o Forget that you ever learned to count higher than threes 
let MIDAS count for you* Bo not say sto .-f 6j use an 
address tag. This will save grief when corrections 
are required • 

5o Organise the program by pages, separating each page of 
flexo tape with a stop code and some tape feed. Let 
the page boundaries coincide with logical divisions 
of the program if possible* Fixing one bad page and 
splicing in a new one takes about as much time as 
reproducing two pages of program, so learn to splice 
tapee 

6 a Have the typescript handy when assembling or debugging 
a program, and note corrections in pencil thereon as 
soon as you find them* 

Performing an Asse mbly without Magnetic Tape 

First read in MIDAS • Turn on the on-line flexowrlter and 
pz^ss Start Read * Set the THl to trn 20 and TAC to Do Load 
the first source tape into the reader and press Restart , MIDAS 
will read the tape in sections of about two pages each, and will 
stop shortly after reading start at the end of the tape. To 
process additional tapes after the first, press Test , Now begin 
Pass 2 hy loading the first tape and pressing Restart « For 
additional tapes, press Test e At the end of Pass 2, press 
Restart again to secure a start block* Tapes should be processed 
in the same order on both passes * 
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The normal operation of MIDAS may be summarized by the 
following table: 

Condition AC LH MBR Action on Restart Action on Test 



MIDAS or symbol 
punch read in 0-0 

End of tape* Pass 10 

End of tape, Pass 2 

After start block -0 



Error stop 



■0 -0 



-0 Begin Pass 1 

Begin Pass 2 

Punch start block 

«0 Restore, begin 
Pass i 

-0 Continue, suppress 
punching 



Begin Pass 2 
Continue Pass 1 
Continue Pass 2 
Begin Pass 1 

Continue Pass 



The normal sequence of operations above can be modified 
by use of the TAG* tfrienever Test is pressed, bit of the TAC 
is examined* If it is zero, the normal sequence is followed^ 
if it is 1, the next 6 bits of the TAC are examined « Note that 
bits 14»17 are examined regardless of the setting of bit 0„ 
The other bits of the TAC control: 



Bit i 
2 

3 
4 



5 
6 



14 

±5 

16 
17 



Pass 1 if 0, pass 2 if i, 

Begin pass if 0, continue pass if ± a 

If 1, punch if pass 2/ if 0, do not punch* 

If 1, punch input routine if punching! if 0, no input 
This takes precedence over the pseudo -instruction 
noinputo 

If 1, punch title if punching^ if 0, no title* 

If 1, restore symbol table to initial symbols and 
pseudo-instructions • 

(Only tilth mag tape MIDAS) If 1, input will be 
from mag tapej if input method determined 
by TAC 15* (See page 29„ ) 

If 1, input will be from the on-line flexowrlterj 
if 0, from paper tape (see page 30 ). 

If 1, printout on-line every character processed o 

If 1, continue processing after an error stop e 
Equivalent to pressing Teste 



S^bgl^imeh^nd_Smbol .Print 

A record of symbol definitions may be printed out by reading 
in MIDAS SYMBOL PRINT. 

A punched record of symbol and/or macro instruction defini- 
tions may be obtained by use of MIDAS SYMBOL PUNCH. Whan 
SYMBOL PUNCH is read in, it will feed some blank tape and listen 
for a title. Type a title on the typewriter * To obtain both 
symbol and macro-instruction definitions, terminate the title 
with a carriage return* For symbols only, terminate with a 
tab, and then type ft s ,a followed by a carriage return. For 
macro definitions only, terminate the title with a tab, 
followed by "m" and a carriage return* The symbol punch so 
obtained may be used with DOCTOR for symbolic debugging, or 
read into MIDAS at a later time for assembling patches or the 
like* When a symbol punch is read into MIDAS, TAC 6 is 
examined a If off, the symbols from the symbol punch are 
merged with any existing symbol table • If on, the symbol 
table is restored to the initial vocabulary before merging 
the symbol punch • 

A symbol punch may be read into MIDAS by placing the symbol 
table in the PETR and pressing "READ-IN." MIDAS will then 
read in the symbol table and halt when it is done. Then 
one may load his tapes which are to be assembled and process 
them« The symbol table may be read in at any time during an 
assembly* (However, reading it in after an error has occurred 
will noJ { correct that error* ) 
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The MIDAS Mag Tape System is an optional feature of the 
MIDAS programing system. MIDAS Mag Tape Patch is a program 
which is read into memory after MIDAS has been read in and 
much gives MIDAS the ability to use the magnetic tape unit 
both as an input and an output device. MIDAS Mag Tape Patch 
permits most English tapes to be assembled and ready to run 
in only a fraction of the time required when punched paper 
tape output is obtained. Moreover, the English tapes need 
be run through the PETR only once at assembly time, thus 
saving tape rewinding time and eliminating PETR errors 
on pass 2„ 

Most MIDAS English tapes can be assembled with the MIDAS 
Mag Tape Patch. However, the following additional restrictions 
apply: 

1. Relocatable tapes cannot be assembled on mag tape* 
2o The results of WORD pseudo-instructions do not appear 

in the mag tape output, 
3* Standard mag tape format is always obtained on the 

mag tape output even though input mode format has 

been specified in the English program. (Mag tape 

format is described below ,) 
4 All tapes processed on pass 1 are reprocessed in the 

same order on pass 2 automatically. Although this 

is usually the case without the Mag Tape Patch, there 

is no longer any choice* 
5o The binary program must contain the same number of words 

on pass 2 as it does on pass l. No ordinary program 
will ever violate this restriction. This restriction 
does not apply to constants « 
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To use MIDAS Mag Tape Patch: 

i* Read in MIDAS « 

2* Read in MIDAS Mag Tape Patch* 

3o Run pass 1 on all English tapes using the same procedure 
as with ordinary MIDAS „ During pass i MIDAS will write 
out each gulp of the English tape onto mag tape, MIDAS 
leaves enough room between the blocks of English tape to 
write out the binary program later on pass 2* 

4« Begin pass 2 by pressing RESTART when pass i is complete * 
There is no need to reload the English tapes in the P£TR<, 
MIDAS will rewind the mag tape and run pass 2 automatically. 
The title of each English tape will be printed out when 
it is encountered on the mag tape* The writing of the 
start block is automatic « If there are no errors in the 
English tape MIDAS will halt at the end of pass 2 with +0 
in the accumulator and will begin another pass i when 
RESTART is pressed* If errors occur, pressing either 
RESTART or TEST will resume the assembly,, 

5» MIDAS checks the checksum of each record that it reads or 
writes o If an error is found, the program will rewrite 
(or reread) a block five times before giving up* If the 
error cannot be corrected, MIDAS will halt with -0 in the 
accumulator, live register, and MBRo Pressing RESTART 
will cause MIDAS to make five more tries * If MIDAS fails 
again, load a fresh reel of tape into the magnetic tape 
unit and begin pass i over again * 



A punched paper copy of the binary program can be obtained 
hj setting the TAC to 670000 and pressing TEST to start pass 2« 
A start block is automatically punched at the end of pass 2o 

TAC i4 may be used to cause the input for pass i to 
be taken from the mag tape. This is useful if one is assembling 
several tapes together, and discovers an error on on& of the 
tapes « When this tape has been corrected, put TAC and TAC 14 
up, TAC i and TAC 2 down, set any other appropriate TAC bits, 
and press TEST to perform pass i on the first tape with the 
input from mag tape. To take additional tapes from mag tape, 
leave the TAC set as it is except for putting TAC 2 up, and 
press TEST for each additional tape to be taken from the mag 
tape* When the corrected tape is to be read in, put TAC ±4 
down, and place the tape in the PETR and press TEST* Any 
additonal tapes must also be read in this manner^ they cannot 
be taken from the mag tape* Then continue with pass 2 in the 
usual manner c 

A "symbol punch" on mag tape is obtained by reading in 
MIDAS Symbol Punch at the end of pass 2. If bit 3 of the TAC 
is up at that time, a punched paper copy of the symbol punch 
will be obtained simultaneously as with paper tape MIDAS o The 
symbols on mag tape can be used by Doctor,, 

A symbol print can be obtained as with ordinary MIDAS « 
MIDAS mag tape format is as follows: 
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±a A record headed by a store-class instruction Is a 
binary block and has the same format as a paper tape 
binary block (first address, complement of the last 
address, data-, complement of the checksum ), 

2o A record headed by a transfer-class or add-class 
instruction is a start block as on paper tape, 

3° A record headed by an operate-class instruction 
contains part of the English source tape which 
MIDAS read on pass l„ 

The Mag Tape Input Routine program will read into memory 

a program having the MIDAS mag tape format • The Mag Tape 

Input Routine extends from register 17742 to register 17777 • 

This is slightly longer than the standard input routine, and 

users whose programs use all of memory should take notice » 

The MIDAS,On-Idne Input Feature 

It is occasionally desirable to make simple corrections 
to an assembly without preparing additional input tapes off-line, 
Thi3 feature can be especially useful for defining symbols 
which were left undefined inadvertently, or to set parameters 
affecting the assembly* The MIDAS On-Llne Input Feature 
enables the on-line f lexo to communicate with MIDAS as if the 
Input were coming from paper tape. 

To use this feature set TAC 15 * 1, and press RESTART or 
TEST as appropriate . This may be done at any time during an 
assembly * Make sure PUNCH ON is depressed and begin typing* 



MIDAS will buffer all input up to the word "start"* and 
will then process the entire typed input* Should you make an 
error, set the TAC G«0, press TEST* and begin anew* Make sure 
all inputs begin with a title and end with "start" followed 
by a carriage return * To return to paper tape operation* set 
TAC 15 * 0* This patch is compatible with the MIDAS Mag Tape 
System* 

Error Stops 

MIDAS will complain about various ambiguities and error 

conditions found in source programs « Some of these have already 

been mentioned* An error listing has the following format: 

Column 1: A three letter code describing the type of 
error* A number following is the depth of 
macro calls • 

25 The octal location in the object program. The 
symbol r means relocation* 

3* The symbolic location in terms of the last 
address tag seen* 

4: The last pseudo- or macro-instruction name seen. 
5 s The offending symbol* if a symbol was in error » 
MIDAS will ignore most errors (with exceptions noted below) 
and will continue the assembly if Restart or Test (with TAC 
0»0) is pressed j the two are equivalent except Restart will 
discontinue punching on Pass 2 if it was in progress * Turning 
up TAC 17 is equivalent to pressing Test after an error stop« 
This bit is independent of the rest of the TACo 



The error conditions are: 

us- : In general, undefined symbol* Undefined symbols 
are evaluated as 0* The third letter tells where 
it was found. 

wj In a storage word or argument of pseudo-instruction 
word * 

m* In a storage word generated by a macro call* 

d: In the size of a dimension array. 

pj In a parameter assignment. 

c: In a constanta 

s: In the argument of etgrt. 

ei In an argument of entry . 

r: In the eount of a repeat * 

t: In an address tag of more than one syllable* This 
will frequently be the result of an undefined macro 
instruction* 

i: In an argument of 0i£ or llf . 

ich Illegal character. The bad character is ignored* 

ilf Illegal format* Some character or characters were 
used in an improper manner. Characters are ignored 
to next tab or carriage return. 

ile Illegal entry. Argument of entry is improper and 
will be Ignored. 

ilx Illegal exito Argument of exit is improper and will 
oe ignored. 

ir~ : Illegal relocation. The relocation is taken as 0* 
The third letter identifies where it was found, and 
will be the same as listed under undefined symbols 
(above ) • 
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mndi Macro name disagrees* The argument of terminate 

disagrees with the name of the macro being^defined „ 
First name is usedo 

mdt: Multiply defined tag. Original definition retainedo 

mdxs Multiply defined exito An argument of exit is pre- 
viously defined with a conflicting value Orginal 
definition retained Q 

mdv: Multiply defined variable* A sjraibol containing 
an upper case letter is previously defined as 
other than a variable. Original definition retained* 

mdds Multiply defined dimension An array name in a 
dlmgnsj.oja statement has a conflicting definition. 
Original definition retained,, 

ipas Improper parameter assignment . The expression to 

the left of an equal sign is Improper The assign- 
ment is ignored o 

sees Storage capacity exceededo Assembly cannot continue 

Too many constants: the pseudoobstruction constants 
used more than 10 o times in one program <, ~ 

Too many parameters: the storage reserved for 
macro instruction arguments has been exceeded* 

tme : Too many entries Maximum number 6f arguments of 
an enfery pseudo -instruction is 37 octal • 

tmv: Too many variables „ The pseudo -instruction variables 
has been used more than 8 times in one program^ 
Assembly cannot continue „ 

eld: Constants location disagrees The pseudo-instruction 
constants has appeared on Pass 2 in a different lo- 
cation from that found on Pass l s meaning all the 
constants syllables have been assigned the wrong 
value o Assembly cannot continue 

cad: Constants area deficient . Insufficient space was 
saved for constants when the pseudo-instruction 
constants was encountered on Pass 1 3 and any following 
program will overlap the constants area used, unless 
given a specific location assignment by means of j * 
The condition is ignored*. 

Two possible recoveries are finding where the 
constants area ends (by means of the SYMBOL PRINT ) $ 
making a location assignment on the English tape 
after the constants pseudo-instruction* and 
reassembling the tape* or making a patch with 
DOCTOR to replace the constants that have been 
clobbered o 
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vld: Variables location disagrees,, The pseudo-instruction 
variables lias appeared on Pass 2 in a different 
location from that found on Pass i* The condition 
is ignored. 

iae: Internal assembler error* MIDAS has found that it 
has made a mistake in assembling the program* De- 
liver the error message and a copy and listing of 
the source program to a member of the TX-0 staff 
so that the trouble may be found. Assembly cannot 
continue * The octal location given is the location 
in MIDAS where the error was found* 

Troubleshooting 

The checking features built into MIDAS will detect simple 

errors like forgotten tags very simply. Attempting to debug 

complex macro definitions from error messages and binary output 

is a much more difficult proposition*. Special aids have been 

provided to simplify this* 

io The pseudo-instructions print and printx take an 
argument exactly like text. which MIDAS will print 
out online during the assembly process* Printx 
prints just the argument and a following carriage 
return, while print precedes this with the first 
three columns of an error listing, with the "error" 
code prjtJo The argument of print or printx may 
contain dummy symbols if used in a macro definition • 

2o Bit 16 of TAG when on, causes MIDAS to print out 
online every character it processes, including all 
macro expansions. This permits the programmer to let 
MIDAS do the bookkeeping when testing a complicated 

macro * 
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Appendix !• MIDAS Initial Vocabulary- 
Part lo Symbols 



add*=200000 
ado«060000 
adx«220G00 
alc«64Q260 
all»640230 
alo«640220 
alr*6402G0 
alx«640031 
amz«640050 
anae*74Q027 
anl«640207 
ano*740207 
arx«640601 
aux*260000 
axc»64006l 
axo«640021 
axra640001 
bsr**6 04000 
cal«700200 
cax«700001 
cla«700000 
clc«700040 
cll«631000 
clrte632000 
coBia600040 
cpf =607000 
op^=620000 
ci^«600012 
C2rX«640030 
eyr«600600 
d±s*622000 
dso*662020 
ex0*6l0000 
exi«6ll000 
ex2=6l2000 
ex3«6l3000 
ex5*6l4000 
8x5*615000 



ex6«6l6000 
ex7«6l7000 

hlt»630000 
iad=640232 
lal*740222 
ixl«600303 
la©«700022 
lad=600032 
lal«700012 
lar«700622 
lax«360000 
la3S«700072 
lcc«700062 
led»6 OOO72 
lda«340000 
ldx«240000 
llr*300000 
llx=320000 
lpd«6G00£2 
lro«600200 
lxrs600003 
nop«600000 
opr«=600000 
ora«740025 
or 1=640205 
oro«740205 
p6b«766020 
p6h«6266;Q0 
p6o=666020 
p6s»726GGQ 
p7h^6276Q0 
p7o=667020 
pen^603QQ0 
pne*664060 
pno*66402G 
pnt«62460Q 
prfc*624GQ0 
rlc*7210G0 



rlr»72l600 

r3c= s 723000 

rax»640203 

rds«6 04004 

rews=604QlO 

rpf«706020 

rtb=*6 04004 

rtd»604024 

rxa«600322 

sto=600400 

slr»100000 

slx«12G006 

spf«647000 

sto»0 

stx»020000 

stz«l4000G 

sxa«040000 

tac»70l000 

tbra702020 

tix«<460000 

tlv»540000 

tpl«560000 

tra«50000Q 

trn«400000 

trx»£20000 

tsx«44000Q 

typ*625000 

tse«420OOO 

wrs«6040l4 

«tb«6 04014 

wtd«6 04034 

xac»700120 

xad»&00130 

xal«700110 

xcc«700l60 

xcd*600l70 

xlr»600300 

xro»60000l 



•36- 



character 
constants 
decimal 
define 
dimension 
endirp 
entry- 
equals 
exit 

flexo 

front loading 

irp 

nolnput 
null 
octal 
opsyn 

print 

printx 
readin 
relocatable 



APPMmXJ^MIZmS IMITIAL VOCABULARY 
Fart 2— Fseudo-TKstructions 

Inserts numerical value of a flexo character. (8) 
Denotes location of stored constants words. (7) 
Interpret integers as decimal numbers. (3) 
Define macro-instructions • (10) 
Allocates space for arrays. (17) 
Ends indefinite repeat. (.15) 

In relocatable programs, puts symbol definitions 
inso program card for use by BRS loader* (22) 

Defines symbol as operationally equivalent to 
another symbol* (5) 

In relocatable programs, names subroutines to 

be called by entering names in transfer vector. (21) 

Inserts numerical value for three flexo characters. (8) 
Calls for front input routine • (20) 

Indefinite repeat. Analyses macro-instruction 
argument as series of subarguments . (15) 

Suppresses input routine, leaves "readin 11 status. (20) 

No-operation, ignored* (16) 

Interpret integers as octal numbers. (3) 

Defines symbols same as equals but effective 
on Pass 1 only* (5} 

Generates symbolic location printout and prints 
comment during assembly . (34) **-««« 

Prints comment during assembly* (34) 

Punch in readin mode format . (20) 

Punch in relocatable formate (21) 
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APPENDIX I— Part 2 Contra, 



repeat 

start 

terminate 

text 

variables 

word 

Oif 

lif 



Repeats character string* (16) 

Denotes end of program and specifies (in absolute 
program) starting address, (19) 

©ids macro definition,, (10*15) 

Inserts words of flexo characters • (8) 

Reserves space for arrays and variables • (5) 

Punches word on object program tape* (20) 

Has value if condition following is true, 
1 otherwise o (17) 

Has value 1 if condition following is true, 
otherwise . (17) 
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APPENDIX IX 
SO ME MACRO-IHSTRUCTION EXAMPLES 

Following are some examples illustrating some more complex 
uses of macro-instructions* All of these examples use so-called 
"information carrying macros •" Basically, an information carrying 
macro is a name assigned to a character string which has provision 
for using or modifying the string* Three different methods are 
used for retrieving the information in the following examples. 

The first two examples illustrate a method of locating 
coding at a remote place in the program • It is sometimes 
convenient, in the middle of a program, to specify flexo text, 
subroutines, or other material to be inserted at an out-of-the 
way place. The macro name remote, followed by arbitrary material 
as an argument, saves up such material for all users of remote 
until the macro-Instruction here is used, which unloads all 
the stored information into the program at that point* 

In the first example, llstname is the information carrying 
macro* Each call of remote calls in cons to concatenate the 
new information onto the end of the old. The key to understanding 
the example is in the definition and use of llstname » In order 
to feed the information in llstname into some macro which can 
make use of it, llstname must be called (expanded) and the 
characters therein fed to the macro to make use of them* This 
is done by feeding the name of the macro to use the information 
to llstname as its argument. The expansion of llstname generates 
the name of the user, followed by two arguments: the name list- 
name itself, followed hj the information characters in llstname 



Thus the user macro can he one which deals with several different 

information carriers, each of which carries its own label* The 

point is that in order to generate a function of the information 

in an ioC*mo, first take i*Com« name of the function name* The 

ioComo flips the function name in front of the information as 

it expands o 

Exercise: Generate the expansion of the following code: 

remote a If a 
remote c add T 
sto T* 
here 

The second example has remote as the i.c*m* The definition 
o£ remote is such that remote effectively redefines itself, 
adding on to its definition anything fed it as an argument. The 
frere macro redefines listname so that when remote next calls it, 
it unloads itself into the program instead of into a new definition 
of remote * The definitions as written here are not self -resetting: 
the appearance of here does not leave either remote or listname 
in condition to he used again. 

Exercise: Define a macro setup which establishes the correct 
initial definitions of remote and listname when it is called o 
Insert calls of setup in appropriate places so that the definitions 
of remote and listname are properly initialized, and are reset 
by use of hg£e_« 

The purpose of the third example is to allow indiscriminate 
use of the pseudo -instruct ions octal and decimal in macro 
definitions without disturbing the current radix outside of 
macro calls* To this end, the system definitions of octal and 
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decimal are saved in the name foetal (real octal) and rdecml 

(real decimal )o Then octal and decimal are defined as macros 

which, in addition to setting the current radix, also append 

to radix to a list of radices called list . To restore the 

previous radix, the macro ol&ra dix peels the top entry off the 

list and discards it, then sets the current radix to the top of 

the entry of the remaining listo The list, after use of decimal 

and octal would look in part like this : 

define append newrdx 

list newrdx, *roctal% ^rdecml, 6 roctal, ^error 599 

terminate 

The method used for manipulating the list is similar to that 

of example 2, Note how the third argument of list is added 

to and deleted from* 

Exercises: Determine the definition of oldradix corresponding 
to the above definition of append s Expand decimal and determine 
its effect on the list* 

The last example illustrates the use if irp. Oif and jJLf c 
The macro deciprt prints out on-line at assembly time the 
numerical value of its argument in English words « Zero suppression, 
sign, and numbers ending in "teen" are all handled correctly* 
The i.em* info contains the text to be printed out, and is 
handled similarly to listname in the first example • The 
sequence info redefine appears so often in the original that the 
macro in has been defined as a shorthand for it. The conversion 
to decimal is handled by the usual method of depletion of powers 
of ten* Zero suppression is handled hy the indicator sup « 
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(remote macros -method 1 # S* R* Russell 

define remote a 

listname ^eoas a $ 
termin 

define listname user 

user listname, 
terminate 

define cons 12, name* ill user 
define name user 
. user name, ^11 
12 9 

terminate name 
terminate cons 

define here 

listname 2ndarg 
define listname user 
user listname, 

terminate listname 

terminate here 

define 2ndarg a,b 

b 
termin 

start 



f remote macros-method 2, A* Kbtok 

define remote a 

listname a 
termin 

define listname 11|12 

define remote 12 
Q listname 6 il 
12* 

terminate remote 
terminate listname 

define here 

define listname info 
info 
terminate listname 

remote 
terminate here 

start 
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J octal-decimal pushdovm, S. £» Finer 

opsyn roctal, octal 
opsyn rdecml, decimal 

define octal 

append rootal 
temin 

define decimal 

append rdecml 
termln 

define error 

print JToo many oldradix pullups* | 

list roctal* error 
termin 

define list radix* prevrdx, rdxlist 
define append mm&z 

list newrdXj *radix% 6 prevroX 6 rdxlist" 
newrdx 

terminate append 
define oldradix 

list prevrdx^rdxllst 

prevrdx 
terminate oldradix 
terminate list 

list roctal* error 

start 
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| decimal print macros, D* A, Gross 



define deciprt number 
z«number 
repeat Oif vp 
repeat lif vp 
repeat lif vz 
repeat lif vz 
info write 
redefine 

terminate 



z,in minus deci2 «z 

2 | -lif vz z,deei2 z 

z| Ilif vz zll*la zero 

z\ Ilif vz zUl,in minus zero 



define deci2 a 



terminate 



sup»Q 

deplete 100000* 

teen«0 

integer 

place hundred 

deplete 10000 • 

intergy 

deplete 1000* 

integer 

place thousand 

deplete 100 , 

teen«0 

sup»0 

integer 

place hundred 

deplete 10 * 

intergy 

deplete 1 

Integer 



define redefine y 

define info user* data 

user y data 

terminate info 
terminate redefine 

redefine 

define in a 

info redefine, a 
terminate 

define arg a,b 
sup«l 

repeat teen, in a 
repeat i-teen,in b 

terminate 



.44^ 



define deplete a 

y»*0 

repeat 9 3 repeat iif vp x«a, x=x~a y«y+i 
terminate 

define integer 

inti * 4 arg eleven, one 9 , 6 arg twelve, two 9 , arg thirteen, three 9 

£ arg fourteen, four 9 , ^ arg fifteen, five 9 , ^arg sixteen, six 9 

*arg seventeen, seven 9 , *arg eighteen, eight 9 , 6 arg nineteen, nine 9? 

repeat iif vz y, repeat teen, in ten 
terminate 

define intergy 

intl *teen»i,in twenty, in thirty, in forty, in fifty, in sixty 

in seventy, in eighty, in ninety 9 

repeat Oif vz y, sup»i 
termin 

define inti k 

irp k 

repeat iif vz y-J,k 

endirp 
terminate 

define write b 

printx |b| 
terminate 

start 



